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PREPROCESSOR SYSTEM AND METHOD FOR REJECTION 
OF DUPLICATE INVOICES 

Background of the Invention 

Technical Field of the Invention 

5 This invention pertains to an account payable system. 

More particularly, it relates to an account payable system 
in which duplicate invoices are identified during 
preprocessing, thus preventing introduction of duplicate 
invoices into the accounts payable data base and 
10 substantially avoiding manual processing. 

Background Art 

Trading partners (also referred to as vendors) 
submitting invoices to a SAP (accounts payable) installation 
15 often send in duplicate files, causing the accounts payable 

center a great deal of analysis and time to manually delete 
these duplicates from the production system (also referred 
to as the accounts payable data base) . 
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Consequently, there is a need in the art for a system 
and method for avoiding much, if not all, such manual 
processing. 

It is an object of the invention to provide an improved 
5 accounts payable system and method. 

It is a further object of the invention to provide an 
improved accounts payable system and method in which manual 
deletion of duplicate files is substantially eliminated. 

It is a further object of the invention to provide an 
10 improved accounts payable system and method in which 

duplicate invoices (input files) are identified during 
preprocessing to avoid introduction of duplicate invoices 
into the accounts payable database. 



Summary of the Invention 



15 In accordance with the invention, there is provided an 

accounts payable system and method. Electronic invoices 
received from a vendor are preprocessed to identify 
duplicate invoices. Invoices not identified as duplicate 
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invoices are introduced into an accounts payable data base 
for payment while invoices identified as duplicate invoices 
are rejected back to the vendor without being introduced 
into the accounts payable data base for payment. 

5 

Other features and advantages of this invention will 
become apparent from the following detailed description of 
the presently preferred embodiment of the invention, taken 
in conjunction with the accompanying drawings, 

10 Brief Description of the Drawings 

Figure 1 illustrates a flow diagram of the method of 
the invention. 

Figure 2 illustrates a flow diagram of the audit 
invoices step of Figure 1. 

15 Figures 3A and 3B, arranged as shown in Figure 3, 

illustrate a flow diagram of the system of the invention. 
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Best Mode for Carrying Out the Invention 

Acronyms; Abbreviations; Function, Procedure and Variable 
Names and Definitions 

(Most of these abbreviations are not intuitive in English 
5 inasmuch as they were derived from German language phrases . 

The code in Table 1 is written in the syntax of the ABAP/4 
language, and has a syntax similar to that of SQL or the IBM 
DB/2 relational database language.) 



10 



15 



20 



AMT 

BSAK 

BELNR 

BELNR-LOW 

BELNR- SIGN 

BELNR-OPTION 



BSIK 
CHECK 



Amount . 

Cleared invoices. 
SAP document number. 

I These three variable names are used to 
I fetch a list of documents from the 
I purchase order history, a table of 

invoices that have the same vendor 

invoice number. 
Open invoices. 

An ABAP/4 verb which checks a condition as 
true or false; if true, processing continues 
through the current event (such as a 
subroutine) ; if false, processing returns to 
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the place from which this event was called, 

such as from a PERFORM. 
CLEAR An ABAP/4 verb which initializes a variable 

or data stream to zeros or blanks, etc., 
5 depending upon the data type. 

DESCRIBE An ABAP/4 verb that means to describe the 

attributes of data. In the context of this 

invention (See Table 1, lines 66, 74, 81), 

the data is a table and the desired attribute 
10 is the number of rows in the table. 

DOCNUM Location (memory or register) where the IDOC 

number is stored. 
DUP Duplicate. 
EBELN Purchase order number. 

15 EBELP Purchase order item (position on purchase 

order) . 

EDI Electronic Data Interchange. 

EDIDC IDOC control table. 

EDIDD IDOC data segment table. 

20 EDI_Z51 An internal table used to hold purchase order 

items . 

EKBE Purchase order history table. 

EKBE_ITAB An internal table used to hold purchase order 

history for one purchase order. 
25 EKBE_I TAB-DMBTR Invoice amount in the purchase order 

EN998071 5 



history table. 

EXIT An ABAP/4 verb which causes control to return 

unconditionally to the caller from this 
subroutine or other event. 
5 E1EDP02 Structure (a list of field names) of the IDOC 

purchase order item data segment. The IDOC 
is stored in a table in which each row has 
two parts: control information, and data 
segment . 

10 IDOC Intermediate document. An invoice is a kind 

of IDOC; In Figure 3, there exist 824 IDOCs 
138 and invoice IDOCs 152. 
IDOC_CONTAINER An internal table containing all IDOC data 
segments . 

15 IDOC_CONTROL Holding area (register or field) for IDOC 

control record. 

IDOC_PO Holding area (register or field) for purchase 

order number. 

IDOC_PO-EBELN Another holding area for purchase order 
20 number. 

IDOC__PO-EBELP Holding area for purchase order item number. 

INT_ZPPOL A temporary, internal table resident in 

memory for the ZPPOL table. 

ITAB Used in a table name to designate an internal 

25 table corresponding to a SAP physical table. 
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15 



20 



QUALF 



REFRESH 



An internal table is a location resident in 
main memory which is initialized to empty. 
LIFNR Vendor number. 

MESSAGE S070 An ABAP/4 message verb meaning get message 
5 #70, a message which identifies a duplicate 

invoice exception. 
PO Purchase Order 

PO_HISTORY_AMT Net amount of credit/debit invoices for a 
vendor invoice number, purchase order item 
10 number combination. 

Field in memory that contains the qualifier 
value of an IDOC data segment. 
An ABAP/4 verb: deletes all rows in an 
internal table. 
SAP System Application and Products for Data 

Processing (an English language phrase 
roughly equivalent to the German language 
phrase from which the acronym is derived) . 
Field that contains the IDOC data segment 
application data. 

Segment name: a field that contains the value 
that identifies the data structure in an IDOC 
data segment . 

SELECT An ABAP/4 verb: get rows out of table. 

25 SHKZG Debit/credit indicator. 
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SDATA 



SEGNAM 



10 



15 



20 



SNDPRN 
SY 

SY-DBCNT 



SY-SUBRC 



VBELN 



WF00 



XBLNR 



X.12 



ZEILE 



ZEKKN 



ZIPRO 



25 



Vendor number on IDOC control record. 
Structure name that contains system values 
available to the program. 

Data base count field; used to count number 
of rows returned from a SELECT from table, or 
to hold the value of the number of rows in an 
internal table. 

Return code (successful or unsuccessful) from 
a call (SELECT, SEARCH, etc.) 
Vendor's invoice number in ZPPAL table 136 
(Figure 3A) . 

SAP transaction for processing workflow 
processes 162 (Figure 3B) . 
Vendor's invoice number in SAP financial 
documents . 

ANSI standard: communications protocol for 
EDI messages. 

Purchase order item number field in the IDOC 
data segment. 

Accounting serial number in purchase order 
history table EKBE, one of tables 134 (Figure 
3A) . 

The processing status field in audit log 
table ZPPOL 142 (Figure 3B) . Values include 
"D" (duplicate), "P" (processed) and M E" 
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(error) . 



ZLGNO 



Preprocessor 130 log number; associated with 



a given file or run number. 



ZPPAL 



Exception log table 136 (Figure 3A) . 



ZPPOL 



Audit log table 142 for auditing results of 



IDOC processing (the D, P, E entries, supra) . 



ZSQNO 



Log sequence number 



810 IDOC file X.12 message identifier for an invoice or 

billing document. 
824 Rejection Application advice derived from an 

application program, such as preprocessor 130 

or post 150. 

997 Rejection Translator 114 rejection, meaning this X.12 
message received from vendor is no good. 
The M - w is typically used as a separator 
between table name and field name, as in: 

tablename- fieldname 
and in this respect uses a DB2 or SQL-like 
syntax. It can also be used instead of an 
underscore in a variable name. 

In accordance with the preferred embodiment of the 
invention, an account payable system is provided in which 
duplicate invoices are identified during preprocessing, thus 
preventing introduction of duplicate invoices into the 
EN998071 9 



accounts payable data base and substantially avoiding manual 
processing. 

In accordance with the preferred embodiment of the 
invention, invoices submitted such as by electronic data 
5 interchange (EDI) to a SAP (accounts payable) installation 

are audited for duplicate electronic invoices prior to them 
being entered into the production SAP environment. This is 
accomplished by building the logic at the pre-processor 
level to audit, identify and return electronically duplicate 

10 transmissions. At the pre-processor level, all inbound 

invoices are sorted in credit/debit sequence. Invoices are 
posted (committed to the production SAP environment; that 
is, to the accounts payable data base) one at a time so 
purchase order history is current for each evaluation. 

15 Inbound invoices are sorted by credit/debit. Only debits 

are audited for duplicates. 

Referring to Figure 1, in accordance with the method of 
the invention, invoices are added to an accounts payable 
data base in such a manner as to avoid introducing spurious 
20 data to the data base. (1) In step 80, an inbound EDI 

invoice file is grabbed before it is input to the data base. 
(2) In step, 82, invoices are audited for duplicates. (3) In 
step 84, upon determining a duplicate invoice, a transaction 
EN998071 10 



back to the vendor is created. And (4) in step 86, posting 
to the accounts payable data base is done only for invoices 
determined during auditing not to be duplicates. 



Referring to Figure 2, the auditing step 82 includes, 
5 in step 88, sorting the inbound invoices against SAP 

production tables for same vendor and same vendor invoice 
number; in step 90, sorting hits from step 88 for same 
purchase order billed; in step 92, sorting hits from step 90 
for same items billed on purchase order; and in step 94 

10 sorting hits from step 92 to see if any item identified has 

a net sum > 0. If an item has net sum < 0, it is not a 
duplicate and is allowed in steps 98 and 86 to be posted to 
the accounts payable data base. If an item has net sum > 0, 
it is a duplicate, and a transaction back to the vendor is 

15 created in steps 96 and 84 to cancel the duplicate invoice. 

Referring to Figure 3, vendor system 110 is connected 
over lines 201 (for submission of an 810 EDI invoice) and 
203 (for receipt of messages back) to EDI mailbox 112. EDI 
mailbox 112 transmits invoice data to DI translator 114 over 
20 interface 205. Translator 114 is connected to production 

interface 122 and 810 IDOC files 124 as is represented by 
lines 213 and 211, respectively; receives 824 rejections 120 
from 810 exception reports block 138 over lines 255 and 257; 
EN998071 11 



and communicates X.12 824 rejections 118 to vendor 110 over 
lines 259 and 261. Preprocessor 130 is connected to 
production interface 122 and 810 IDOC files 124 as is 
represented by lines 217 and 215, respectively. 
5 Preprocessor 130 receives data from SAP purchase order and 

other tables 134 over interface 225; and provides data 
identifying duplicate invoices over line 249 to exception 
log tables ZPPAL 136 and over line 221 to audit log ZPPOL 
142. Preprocessor 130 creates the SAP IDOC and provides 

10 output for purchase orders which are not duplicates over 

interface 219 to post SAP invoice/credit block 150 and over 
interface 223 to IDOC table 152. Post block 150 provides 
output over line 229 to SAP PO invoice verification file 
154. Post block 150 provides a processed ^P f message to 

15 audit log ZPPOL 142 over line 269 for invoices for which no 

error has been identified; and an error A E' message over 
line 2 67 for invoices which are not posted due to some 
processing error. Invoices which are not posted due to some 
processing error are communicated over line 231 to SAP 

20 workflow file 156, and, as is represented by block 162 and 

lines 237 and 239, these exceptions are manually worked 
using SAP WF00. Audit control reports 146 are communicated 
over lines 241 and 243 to print block 148. Old information 
archive data 144 is communicated over lines 245 and 247 from 

25 audit log 142 to exception log tables 247. As is 
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represented by line 251, exceptions and warnings reports 138 
are communicated from exception log tables 136 to print 
block 140 over line 253 or as 824 rejections 120 over lines 
255 and 257 to translator 114. 

5 In operation, checkpoints CPO through CP7 (represented 

generally by the numbered triangles in Figure 3) , control 
the EDI process of the preferred embodiment of the 
invention. 

Checkpoint 0: DI set-up and authorization. A vendor 
10 110 who submits and 810 EDI invoice over line 210 to EDI 

mailbox must be set-up as a trading partner in DI translator 
114. In accordance with the preferred embodiment of the 
invention, a restrictive mailbox 112 is used, and if the 
account user identifier (ID) is not set-up, the network 
15 sends an X,12 997 rejection 116 back to vendor 110 stating 

that its 810 invoice was undeliverable . 

Checkpoint 1: DI translator in/out. A count is 
maintained of the number of invoices coming into DI 
translator 114 over line 205, and it must equal the nuinber 
20 of invoices that exit DI translator as accepted invoices 

over line 213 or as rejected invoice records over lines 207 
and 259. The dollar count coming into DI translator 114 
EN998071 13 



over interface 205 is taken from the TDS segment of the 
incoming record. 

Checkpoint 2: Pre-processor in/out. Preprocessor 130 
completes and validates transactions passed through 
5 production interface 122 from DI translator 114. 

Preprocessor 130 generates audit control log 142 and report 
146; preprocessor errors, or exception reports 138 and log 
136; calculates line item accounts; deducts sales tax; adds 
multiple IDOCs to IDOC table 152; and creates the SAP IDOC 
10 number. 

Checkpoint 3: Post, or create, SAP invoice/credit. 
Post SAP invoice/credit block ensures that the record and 
dollar count that exited from DI translator 114 match what 
is entered into SAP 156. 

15 Checkpoint 4: SAP error queue for exceptions. 

Exceptions going into an error queue in workflow file 156 
are IDOCs that fail SAP audits, such as configuration 
problems. Workflow file 156 contains exception messages for 
failed IDOCs that are handled via workflow processes. That 

20 is, when an IDOC fails it is put in a work queue. A 

workflow process is a job that controls what will happen 
with that failed IDOC. In this case, the failed IDOC 
EN998071 14 



message is placed in a queue and a corresponding workflow 
task is sent to an SAP user id. The recipient at that user 
ID retrieves these messages from his mail inbox as is 
represented by line 237 and handles them one at a time, 
5 accessing IDOC table 152 as is represented by line 263 and 

SAP WfOO block 162 to again process the IDOC and determine 
why the IDOC failed (see what error messages they get.) 

Checkpoint 5: Pre-processor exceptions/warnings. 
Exceptions added to log tables 136 are IDOCs which become 

10 errors (representing duplicate invoices) as a result of the 

audit by preprocessor 130. Warnings added to log tables 136 
represent IDOCs where preprocessor 130 recalculates an 
invoice, deducts sales tax, or adds multiple IDOCs. A 
report 140 is generated showing rejection transactions, 

15 where preprocessor 130 errors successfully resulted in an 

824 rejection message 118, 120 being sent to vendor 110. 

Checkpoint 6: Archive old information. Exception log 
tables 136 and audit log tables 142 are archived to block 
144 at predefined intervals. A report shows the range of 
2 0 dates that are archived, and the date of archival. 



Checkpoint 7: Production/Procurement interface. 
Production interface 122, in this preferred embodiment 
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of 



the invention, interfaces the MVS environment (above 
interface 122) to the AIX environment (below interface 122). 

Referring to Table 1, the processing which occurs in 
preprocessor 130 is described in further detail. The code 
5 is in the syntax of the ABAP/4 language, which has a syntax 

similar to that of the SQL language. 

In Table 1, lines 1-13 are the main routine for 
processing IDOCs that are created and for calling the 
duplicate invoice check routine. The flag at line 8 

10 indicates whether or not a duplicate invoice has been found. 

At line 9, if this invoice is a debit invoice, then the 
duplicate invoice check starting at line 16 is called. Upon 
returning from the duplicate invoice check, processing drops 
down to line 13 where the duplicate invoice flag is checked 

15 and, if the flag indicates the invoice is ok, processing 

leaves the code of Table 1 and picks up in code (not shown) 
executed within post block 150 (Figure 3B) . (If the 
duplicate invoice check at line 13 shows duplicate 'D f 
status, then the duplicate check routine below line 14 will 

2 0 have already posted the error and sent the error message 
back to the vendor.) Refer to the schedule of 
abbreviations, supra, for a description of each data and 
variable name. 
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In Table 1, lines 16 to 125 are the duplicate invoice 
check routine executed within preprocessor 130. In this 
routine, CHECK verbs are executed at lines 23, 67, 75, 82 
and 89, representing the five checks comprising duplicate 
5 invoice checking in accordance with the preferred embodiment 

of the invention. In the logic of this embodiment of the 
invention, if any CHECK fails, then the invoice is not a 
duplicate, and execution returns to main routine at lines 1- 
14. 



10 In Table 1, lines 15-23, the return code from exception 

log table ZPPAL 136 is tested. The CHECK at line 23 checks 
the return code, which is never expected to fail, and 
processing continues to line 27. 



In Table 1, lines 24-67, all open and closed invoices 
15 for this vendor's invoice number are selected (see lines 45 

and 56) . If none are found, no checking is to be done, and 
the CHECK at line 67 will return control to the main 
routine. At line 27 this vendor is checked to see if it is 
identified as one for which duplicate invoice checking is to 
20 be performed. 



In Table 1, lines 68-75, the list of vendor invoice 
numbers determined previously to match the one we are 
EN998071 17 



checking is examined to see if 
related purchase orders. That 
If there is none, then an exit 
check subroutine occurs at the 



there has been any previous 
is, is there a PO history, 
from the duplicate invoice 
CHECK at line 75. 



5 In Table 1, lines 76-82, determines if any purchase 

order item IDOC data segments have been identified. The 
CHECK at line determines if any purchase order item IDOC 
data segments have been identified. The result is always 
expected to be true, and processing continues. 



10 In Table 1, lines 83-89, the final check is performed. 

This routine determines, for each item on the invoice, the 
sum of its purchase order history (having the same vendor's 
invoice number as the one being checked) . If an item has a 
purchase order history greater than zero, the CHECK at line 

15 89 rejects this purchase order as a duplicate. 



In Table 1, lines 91 to 125, the result of duplicate 
invoice checking is logged to ZPPOL log 142 and ZPPAL log 
136, and status is logged to IDOC table 152. 



In Table 1, lines 127 to 193, several subroutines 
2 0 called by PERFORM verbs from the duplicate invoice checking 

process are set forth. FORM BUILD_EKBE_ITAB__TABLE, at lines 
EN998071 18 



127-137, is the subroutine called by the PERFORM at line 73 
that obtains the purchase order history for invoices that 
have a vendor invoice number equal to the invoice number 
being checked. FORM BUT LD_IDOC_PO_T ABLE, at lines 138 to 
5 175, is the subroutine called by the PERFORM at lin 80 that 

reads in IDOC segments and gets every unique purchase 
order/item number combination, and generates the list of 
purchase order items of interest. FORM 

TEST_PO_HIST_WITH_PO_ITEMS, at lines 176 to 193, is the 
10 subroutine called by the PERFORM at line 88 that sums the 

net purchase order history amount for every purchase order 
item on the invoice being checked; if it finds an item with 
an amount greater than zero, the routine exits back to the 
PERFORM (line 88) and quits checking. 



TABLE 1: DEBIT INVOICES DUPLICATE CHECKING 



1 * 

2 * Debit invoices duplicate checking 

3 * 

4 DATA : DUP_INVO I CE ( 1 ) . 

5 * 

6 * Contained in form process-zppol (Table 142, Figure 3B) 

7 * 

8 DUP_INVOICE = SPACE. 

9 IF INT-ZPPOL-CREDIT_DEBIT = 'D'. 

10 PEFORM DUP_INVOICE_CHECK. 

11 CLEAR ZPPAL. 
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12 ENDIF. 

13 CHECK DUP_INVOICE=SPACE . 

14 * 

15 * 

16 FORM DUP_INVOICE_CHECK. 

17 * 

18 * Break-point 

19 * 

20 SELECT SINGLE* FROM ZPPAL WHERE 

21 ZLGNO = INT_ZPPOL-ZLGNO AND 

22 ZSQNO = INT-ZPPOL-ZSQNO. 

23 CHECK SY-SUBRC=00. 

24 * 

25 * Is the vendor to be dup invoice checked? 

26 * 

27 IF ZPPAL-SNDPRN IN SNDPRN. 

28 * 

29 * Next sentence 

30 * 

31 ELSE . 

32 EXIT. 

33 ENDIF. 

34 * 

35 * Get all invoice numbers with same vendor 

36 * invoice number to be used later for 

37 * summing po-history by vendor invoice number. 

38 * 

39 * Check open documents 

40 * 

41 CLEAR BELNR. 

42 REFRESH BELNR. 

43 * 

44 * 

4 5 SELECT* FROM BSIK WHERE 
4 6 LIFNR = ZPPAL-SNDPRN AND 

4 7 XBLNR = ZPPAL-VBELN(16) . 

4 8 BELNR-LOW = BSIK-BELNR. 
4 9 BELNR- SIGN = x l' . 

50 BELNR-OPTION = *EQ r . 

51 APPEND BELNR. 

52 ENDSELECT. 

53 * 

54 * Check closed documents. 

55 * 

56 SELECT* FROM BSAK WHERE 

57 LIFNR = ZPPAL-SNDPRN AND 

58 XBLNR = ZPPAL-VBELN(16) . 

59 BELNR-LOW = BSAK-BELNR. 

60 BELNR- SIGN = . 
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61 BELNR-OPTION = y EQ' . 

62 APPEND BELNR. 

63 ENDSELECT . 

64 * 

65 * 

66 DESCRIBE TABLE BELNR LINES SY-DBCNT. 

67 CHECK SY-DBCNT>0. 

68 * 

69 * Does any PO history exist for the 

70 * PO on the idoc with invoices in the 

71 * above BELNR ranges table? 

72 * 

73 PERFORM BUILD_EKBE_ITAB_TABLE . 

74 DESCRIBE TABLE EKBE_I TAB LINES SY-DBCNT. 

75 CHECK SY-DBCNT>0. 

76 * 

77 * Fetch PO-item list from the idoc. 

78 * 

79 I NTERME D I ATE_DOCUMENT_NUMBER = INT_ZPPOL-DOCNUM. 

80 PERFORM BUILD_IDOC_PO_TABLE . 

81 DESCRIBE TABLE IDOC_PO LINES SY-DBCNT. 

82 CHECK SY-DBCNT>0. 

83 * 

84 * Does at least one PO-Item on the idoc 

85 * have a net PO history > zero? 

86 * 

87 CLEAR PO_HISTORY_AMT. 

88 PERFORM TEST_PO_HIST_WITH_PO_ITEMS . 

89 CHECK PO_HISTORY_AMT>0. 

90 * 

91 * If all the above tests were true then the 

92 * invoice is a duplicate. 

93 * 

94 MESSAGE S070 WITH ZPPAL-VBELN (16) IDOC_POK-EBELN. 

95 SKIP. 

9 6 WRITE :/'Dup Invoice:', 



97 'idoc' , INT_ZPPOL-DOCNUM, 

98 'PO-Item' , IDOC_PO-EBELN, IDOC_PO-EBELP, 

99 'Hist-Amt' , PO_HISTORY_AMT, 
100 

101 WRITE:/' Vendor', ZPPAL-SNDPRN, 

102 'Vendor- InvNo ' , ZPPAL-VBELN, 
103 

104 PERFORM FORMAT -MESSAGE 

105 USING 070 A |' ZPPAL-VBELN (16) 

10 6 IDOC_PO-EBELN " 

107 UPDATE ZPPAL. 

108 ZPPOL-ZIPRO = 'D' . 

109 UPDATE ZPPOL. 
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110 PERFORM STATUS_DUP_INVOICE. "Update idoc status 

111 COMMIT WORK. 



112 CALL FUNCTION A EDI_DOCUMENT_CLOSE_PROCESS' 

113 EXPORTING 

114 DOCUMENT NUMBER = INTERMEDIATE_DOCUMENT_NUMBER 

115 IMPORTING 

116 IDOC_CONTROL = EDI DC 

117 EXCEPTIONS 

118 DOCUMENT_NOT_OPEN =01 

119 FAI LURE_IN_DB_WRI TE = 02 

120 PARAMETER_ERROR =03 

121 STATUS SET MISSING = 04. 



122 CLEAR ZPPAL. 

123 CLEAR ZPPOL. 

124 DUP_INVOICE = ^X f . 

125 ENDFORM." DUP_INVOICE_CHECK . 

126 *EJECT 

127 FORM BUILD_EKBE_ITAB_TABLE. 

128 CLEAR EKBE_ITAB. 

129 REFRESH EKBE_ITAB . 

130 SELECT *FROM EKBE INTO TABLE EKBE ITAB WHERE 



131 EBELN = INT_ZPPOL-EBELN AND 

132 ZEKKN > 0 AND 

133 BELNR IN BELNR. 

134 SORT EKBE_I TAB BY EBELN EBELP. 

135 END FORM." BUILD_EKBE_ITAB_TABLE . 

136 * 

137 * 

138 FORM BUILD_IDOC_PO_TABLE. 

139 CALL FUNCTION 'EDI_DOCUMENT_OPEN_FOR_PROCESS' 
14 0 EXPORTING 

141 DOCUMENTJSTUMBER = INTERMEDIATE_DOCUMENT_NUMBER 

142 IMPORTING 

143 IDOC_CONTROL = EDIDC 

144 EXCEPTIONS 

145 DOCUMENT_FORE I GN_LOCK =01 
14 6 DOCUMENT_NOT_EXIST = 02 

147 DOCUMENT_NUMBER_INVALID = 03. 

148 CHECK SY-SUBRC = 00. 
14 9 CLEAR IPOC_PO. 

150 REFRESH IDOC_PO. 

151 DO. 

152 CALL FUNCTION y DI C_SEGMENT_GET_NEXT ' 

153 EXPORTING 

154 DOCUMENT_NUMBER = INTERMEDIATE_DOCUMENT_NUMBER 

155 IMPORTING 

156 IDOC_CONTAINER = EDIDD 

157 EXCEPTIONS 

158 DOCUMENT NUMBER INVALID = 01 
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159 END_OF_DOCUMENT = 02. 

160 IF SY-SUBRC <> 00. EXIT . ENDIF. "at end exit do loop 

161 *** if edidd-segnam = *EDI_Z51'. 

162 *** move z51_rec-ordnr to idoc_po_ebeln. 

163 *** move z51_rec-orpnr to idoc_po-ebelp. 

164 IF EDIDD-SEGNAM = , E1EDP02 ' . 

165 MOVE EDIDD-SDATA TO E1EDP02. 

166 IF E1EDP02-QUALF = '001'. 

167 MOVE E1EDP02-BELNR TO IDOC_PO-EBELN. 

168 MOVE E1EDP02-ZEILE TO IDOC_PO-EBELP . 

169 APPEND IDOC_PO. 

170 ENDIF. 

171 ENDIF. 

172 ENDDO. 

173 SORT IDOC_PO BY EBELN EBELP. 

174 END FORM. " BUILD_IDOC_PO_TABLE . 

175 * * 

176 FORM TEST_PO_HIST_WITH_PO_ITEMS. 

177 LOOP AT IDOC_PO. 

178 CLEAR PO_HISTORY_AMT. 

179 LOOP AT EKBE_I TAB WHERE 

180 EBELP = IDOC_PO-EBELP . 

181 IF EKBE_ITAB-SHKZG _ *H' . 

182 PO_HISTORY_AMT = 

183 PO_HISTORY_AMT + (EKBE_ITAB-DMBTR*-1 ) . 

184 ELSE. 

185 PO_HISTORY_AMT = 

18 6 PO_HISTORY_AMT + EKBE_ITAB_DMBTR. 

187 ENDIF. 

188 ENDLOOP. "AT EKBE_ITAB WHERE 
18 9 IF PO_HISTORY_AMT>0. 

190 EXIT. 

191 ENDIF. 

192 ENDLOOP." IDOC_PO. 

193 ENDFORM." TEST PO HIST WITH PO ITEMS. 



Advantages over the Prior Art 



5 



It is an advantage of the invention that there is 
provided an improved accounts payable system and method. 
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It is an advantage of the invention that there is 
provided an improved accounts payable system and method in 
which manual deletion of duplicate files is substantially 
eliminated. 

It is an advantage of the invention that there is 
provided an improved accounts payable system and method in 
which duplicate invoices (input files) are identified during 
preprocessing to avoid introduction of duplicate invoices 
into the accounts payable database. 

Alternative Embodiments 

It will be appreciated that, although specific 
embodiments of the invention have been described herein for 
purposes of illustration, various modifications may be made 
without departing from the spirit and scope of the 
invention. In particular, it is within the scope of the 
invention to provide a memory device, such as a transmission 
medium, magnetic or optical tape or disc, or the like, for 
storing signals for controlling the operation of a computer 
according to the method of the invention and/or to structure 
its components in accordance with the system of the 
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invention. 



Accordingly, the scope of protection of this invention 
is limited only by the following claims and their 
5 equivalents. 
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CLAIMS 



1 1. Method for operating an account payable computing 

2 system, comprising the steps of: 

3 preprocessing electronic invoices received from a 

4 vendor to identify duplicate invoices; 

5 introducing invoices not identified as duplicate 

6 invoices into an accounts payable data base; and 

7 rejecting invoices identified as duplicate invoices 

8 back to said vendor without introducing said duplicate 

9 invoices into said accounts payable data base. 



1 2. A method for operating a computing system, comprising 

2 the steps of: 

3 grabbing an inbound EDI invoice file from a vendor 

4 before it is input to an accounts payable database; 
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5 auditing said inbound EDI invoice file for a duplicate 

6 invoice item; 

7 upon determining said inbound EDI invoice is a 

8 duplicate, creating a duplicate invoice transaction 

9 back to said vendor; and 

10 posting to said accounts payable database only those 

11 invoices determined not to be duplicates. 

1 3. The method of claim 2, said auditing step comprising 

2 the further steps of: 

3 first sorting said inbound EDI invoice against an 

4 accounts payable production table for same vendor and 

5 same vendor invoice number; 

6 second sorting hits from said first sorting for same 

7 purchase order billed; 

8 third sorting hits from said second sorting for same 

9 items billed on purchase order; 



10 



fourth sorting hits from said third sorting to identify 
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said inbound EDI invoice as a duplicate invoice if it 
contains an item having a net sum greater than zero. 



1 4. Method for operating a computing system responsive to 

2 receipt of an electronic input invoice from a vendor, 

3 comprising the steps of: 

4 grabbing said input invoice before it is input to an 

5 accounts payable database; 

6 identifying previously received invoices from said 

7 vendor having the same vendor invoice identifier; 

8 identifying said previously received invoices having 

9 the same vendor invoice identifier any items 

10 corresponding to items on said input invoice; 

11 calculating the net sum of items on said input invoice 

12 having corresponding items on said previously received 

13 invoices; 

14 for an input invoice having an item with a net sum 

15 greater than zero, communicating a duplicate invoice 

16 rejection message back to said vendor; and 
EN998071 28 



17 for an input invoice having no item with a net sum 

18 greater than zero, posting said input invoice to said 

19 accounts payable database. 

1 5. A program storage device readable by a machine, 

2 tangibly embodying a program of instructions executable by a 

3 machine to perform method steps for processing electronic 

4 input invoices from a vendor, said method steps comprising: 

5 preprocessing said input invoices to identify duplicate 

6 invoices; 

7 introducing invoices not identified as duplicate 

8 invoices into an accounts payable data base for 

9 payment; and 

10 rejecting invoices identified as duplicate invoices 

11 back to said vendor without introducing said duplicate 

12 invoices into said accounts payable data base for 

13 payment. 



1 



2 



6. A program storage device readable by a machine, 
tangibly embodying a program of instructions executable by a 
EN998071 29 



3 



4 



5 



machine to perform method steps for operating a computing 
system responsive to receipt of an electronic input invoice 
from a vendor , said method steps comprising: 



6 grabbing said input invoice before it is input to an 

7 accounts payable database; 

8 identifying previously received invoices from said 

9 vendor having the same vendor invoice identifier; 

10 identifying said previously received invoices having 

11 the same vendor invoice identifier any items 

12 corresponding to items on said input invoice; 

13 calculating the net sum of items on said input invoice 

14 having corresponding items on said previously received 

15 invoices; 

16 for an input invoice having an item with a net sum 
IV greater than zero, communicating a duplicate invoice 

18 rejection message back to said vendor; and 

19 for an input invoice having no item with a net sum 

20 greater than zero, posting said input invoice to said 

21 accounts payable database. 
EN998071 30 



1 7 . An article of manufacture comprising: 

2 a computer useable medium having computer readable 

3 program code means embodied therein for operating a 

4 computing system responsive to receipt of an electronic 

5 input invoice from a vendor, the computer readable 

6 program means in said article of manufacture 

7 comprising: 

8 computer readable program code means for causing a 

9 computer to effect grabbing said input invoice before 

10 it is input to an accounts payable database; 

11 computer readable program code means for causing a 

12 computer to effect identifying previously received 

13 invoices from said vendor having the same vendor 

14 invoice identifier; 

15 computer readable program code means for causing a 

16 computer to effect identifying said previously received 

17 invoices having the same vendor invoice identifier any 

18 items corresponding to items on said input invoice; 
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19 computer readable program code means for causing a 

20 computer to effect calculating the net sum of items on 

21 said input invoice having corresponding items on said 

22 previously received invoices; 

23 computer readable program code means for causing a 

24 computer to effect for an input invoice having an item 

25 with a net sum greater than zero, communicating a 

26 duplicate invoice rejection message back to said 

27 vendor; and 

28 computer readable program code means for causing a 

29 computer to effect for an input invoice having no item 

30 with a net sum greater than zero, posting said input 

31 invoice to said accounts payable database. 

1 8 . An article of manufacture comprising: 

2 a computer useable medium having computer readable 

3 program code means embodied therein for processing 

4 electronic input invoices from a vendor, the computer 

5 readable program means in said article of manufacture 

6 comprising: 
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9 



computer readable program code means for causing a 
computer to effect preprocessing said input invoices to 
identify duplicate invoices; 



10 computer readable program code means for causing a 

11 computer to effect introducing invoices not identified 

12 as duplicate invoices into an accounts payable data 

13 base for payment; and 

14 computer readable program code means for causing a 

15 computer to effect rejecting invoices identified as 

16 duplicate invoices back to said vendor without 

17 introducing said duplicate invoices into said accounts 

18 payable data base for payment. 



1 9. A computing system responsive to receipt of an 

2 electronic input invoice from a vendor, comprising: 

3 means for grabbing said input invoice before it is 

4 input to an accounts payable database; 

5 means for identifying previously received invoices from 

6 said vendor having the same vendor invoice identifier; 
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9 



means for identifying said previously received invoices 
having the same vendor invoice identifier any items 
corresponding to items on said input invoice; 



10 means for calculating the net sum of items on said 

11 input invoice having corresponding items on said 

12 previously received invoices; 

13 means, responsive to an input invoice having an item 

14 with a net sum greater than zero, for communicating a 

15 duplicate invoice rejection message back to said 

16 vendor; and 

1 7 means, responsive to an input invoice having no item 

18 with a net sum greater than zero, for posting said 

19 input invoice to said accounts payable database. 
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PREPROCESSOR SYSTEM AND METHOD FOR REJECTION 
OF DUPLICATE INVOICES 



Abstract of the Disclosure 



5 An accounts payable system in which invoices submitted 

by electronic data interchange (EDI) foe audited for 
duplicate invoices prior to them being entered into the 
production database, or environment. Pre-processor logic 
audits, identifies and returns electronically duplicate 

10 transmissions. At this pre-processor level, all inbound 

invoices are sorted in credit/debit sequence. Invoices are 
posted (committed to the production accounts payable 
environment; that is, to the accounts payable data base) one 
at a time so purchase order history is current for each 

15 evaluation. Inbound invoices are sorted by credit/debit. 
Only debits are audited. 
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Attorney Docket No.: EN998071 
DECLARATION AND POWER OF ATTORNEY FOR PATENT APPLICATION 

As a below named inventor, I hereby declare that: 

My residence, post office address and citizenship are as stated below next to ray name; 

I believe I am the original, first and sole inventor (if only one name is listed 
below) or an original, first and joint inventor (if plural names are listed below) of 
the subject matter which is claimed and for which a patent is sought on the invention 
entitled : Preprocessor System and Method for Rejection of Duplicate Invoices 

the specification of which (check one) 
X is attached hereto. 

was filed on _ as Application Serial No. or PCAT 



International Application No. and was amended on (if 

applicable) . 

I hereby state that I have reviewed and understand the contents of the 
above-identified specification, including the claims, as amended by any amendment 
referred to above. 

I acknowledge the duty to disclose information which is material to the patentability 
of this application in accordance with Title 37, Code of Federal Regulations, Section 
1.56. 

I hereby claim foreign priority benefits under Title 35, United States Code, Section 
119 (a) -(d) or Section 365(b) of any foreign application (s) for patent or inventor's 
certificate or Section 365(a) of any PCT International application which designated at 
least one country other than the United States, listed below and have also identified 
below any foreign application for patent or inventors certificate, or PCAT 
International application having a filing date before that of the application on which 
priority is claimed:: 

Prior Foreign Appplication (s ) : 

Number Country Date/Month/Year Priority Claimed 



I hereby claim the benefit under 35 U.S.C. Section 119(e) of any United States 
provisional application (s) listed below. 

Application Number Filing Date 



I hereby claim the benefit under Title 35, United States Code, section 120 of any 
United States application (s) , or Section 365(c) of any PCT International application 
designating the United States, listed below and, insofar as the subject matter of each 
of the claims of this application is not disclosed in the prior United States or PCT 
International application in the manner provided by the first paragraph of 35 U.S.C. 
Section 112, I acknowledge the duty to disclose information material to patentability 
of this application as defined in 37 CFR Section 1.56 which became available between 
the filing date of the prior application and the national or PCT International filing 
date of this application: 

Prior U.S. Applications: 

Serial No. Filing Date Status (patented, pending, abandoned) 
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As a named inventor, I hereby appoint the following attorneys and/or agents to 
prosecute this application and transact all business in the Patent and Trademark 
Office connected therewith; David L . Adour, Reg. No. 29,604; Lawrence R. Fraley, Reg. 
No. 26,885; John R. Pivnichny, Reg. No. 43,001; Arthur J. Samodovitz , Reg. No. 31,297; 
William H. Steinberg, Reg. No. 28,540; Christopher A. Hughes, Reg. No. 26,914; Edward 
A. Pennington, Reg. No. 32,588; John H. Hoel, Reg. No. 26,279; Joseph C. Redmond, Jr., 
Reg. No. 18,753; and Shelley M Beckstrand, Reg. No. 24,886. 

Send all correspondence to: Shelley M Beckstrand, P.C. 

Attorney at Law 
314 Main Street 
Owego, NY 13827 

Direct telephone calls to: (607) 687-9913 [alt: (607) 755-3268] 

I hereby declare that all statements made herein of my own knowledge are true and that 
all statements made on information and belief are believed to be true; and further 
that these statements were made with the knowledge that willful false statements and 
the like so made are punishable by fine or imprisonment, or both, under Section 1001 
of Title 18 of the United States Code and that such willful false statements may 
jeopardize the validity of the application or any patent issued thereon. 
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